Public Class Dialog
	Inherits TcKs.MSOffice.Common.ChildObjectWrapperBase
	
	Friend Sub New ( ByVal nativeObject As Global.System.Object,  ByVal rootObject As Global.TcKs.MSOffice.Common.RootObjectWrapperBase )
		MyBase.New ( nativeObject, rootObject )
	End Sub 
	
	Public Function Show( aTimeOut As Global.System.Object ) As Global.System.Int32
		Dim result As Global.System.Object = MyBase.WrappedObject.Show( aTimeOut )
		Return result
	End Function 
	
	Public Function Display( aTimeOut As Global.System.Object ) As Global.System.Int32
		Dim result As Global.System.Object = MyBase.WrappedObject.Display( aTimeOut )
		Return result
	End Function 
	
	Public Sub Execute(  )
		MyBase.WrappedObject.Execute(  )
	End Sub 
	
	Public Sub Update(  )
		MyBase.WrappedObject.Update(  )
	End Sub 
	
	Public ReadOnly Property Application As Global.TcKs.MSOffice.Word.Application
		Get 
			Dim ret As Global.TcKs.MSOffice.Word.Application =  Me.FindTopRootObject()
			Return ret
		End Get 
	End Property 
	
	Public ReadOnly Property Creator As Global.System.Int32
		Get 
			Return MyBase.WrappedObject.Creator
		End Get 
	End Property 
	
	Public ReadOnly Property Parent As Global.System.Object
		Get 
			Return MyBase.WrappedObject.Parent
		End Get 
	End Property 
	
	Public Property DefaultTab As Global.TcKs.MSOffice.Word.WdWordDialogTab
		Get 
			Return MyBase.WrappedObject.DefaultTab
		End Get 
		Set ( ByVal Value As Global.TcKs.MSOffice.Word.WdWordDialogTab )
			MyBase.WrappedObject.DefaultTab = Value 
		End Set 
	End Property 
	
	Public ReadOnly Property Type As Global.TcKs.MSOffice.Word.WdWordDialog
		Get 
			Return MyBase.WrappedObject.Type
		End Get 
	End Property 
	
	Public ReadOnly Property CommandName As Global.System.String
		Get 
			Return MyBase.WrappedObject.CommandName
		End Get 
	End Property 
	
	Public ReadOnly Property CommandBarId As Global.System.Int32
		Get 
			Return MyBase.WrappedObject.CommandBarId
		End Get 
	End Property 
	
End Class 
